From 647ae0d68cf04833e2b6bfab4f1d2119b3ba1e03 Mon Sep 17 00:00:00 2001 From: Henrik Enberg Date: Mon, 30 Apr 2007 20:47:00 +0000 Subject: [PATCH] (rmail-header-add-header): Use delete-region instead of kill-region. --- lisp/mail/rmailhdr.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/mail/rmailhdr.el b/lisp/mail/rmailhdr.el index bf4438e10d5..c896b629483 100644 --- a/lisp/mail/rmailhdr.el +++ b/lisp/mail/rmailhdr.el @@ -72,7 +72,7 @@ instead." (let ((start (match-beginning 0))) (re-search-forward "\n[^ \t]") (goto-char limit) - (kill-region start (1+ (match-beginning 0)))) + (delete-region start (1+ (match-beginning 0)))) (goto-char limit)) (when (> (length value) 0) (insert header ": " value "\n"))))) -- 2.30.2